Declare file-name-concat as side-effect free

* lisp/emacs-lisp/byte-opt.el (side-effect-free-fns): Declare
file-name-concat as side-effect (and error) free.

diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el
index 2232617e5ea5dc29b11f4a5a20d5569a5f3b5278..ad0273dc1536c3f40fdc0d6138221d26d4665df6 100644 (file)
--- a/lisp/emacs-lisp/byte-opt.el
+++ b/lisp/emacs-lisp/byte-opt.el
@@ -1405,6 +1405,7 @@ See Info node `(elisp) Integer Basics'."
         current-buffer current-global-map current-indentation
         current-local-map current-minor-mode-maps current-time
         eobp eolp eq equal eventp
+         file-name-concat
         fixnump floatp following-char framep
         get-largest-window get-lru-window
         hash-table-p